G:\Shared drives\MRDC Documents\Website\MRDCL Videos\mrdcl_files\PRE-103\run.stp
start data,
serial number in columns 1-3,
ds $gender=$4/1-2,
x='Male;
Female',
xt='Gender',
ds $main_car=$5-6/1-12,
ignore,ignore,ignore,
ignore,ignore,ignore,
ignore,ignore,ignore,
x='
Make 1;
Make 2;
Make 3;
Make 4;
Make 5;
Make 6;
Make 7;
Make 8;
Make 9;
Make 10;
Make 11;
Other',
xt='Make of car driven most often',
ds $rating=$7/1-5,e,
x='Very good (2)<v2>;
Quite good (1)<v1>;
Neither good nor bad (0)<v0>;
Quite poor (-1)<v-1>;
Very poor (-2)<v-2>;
Unsure',
xt='Rating of car driven most often',
dm $makes_considered=$8-9 * 5/1-12,
x=$main_car,
xt='Makes considered',
finish data,
start tables,
f=clw8,
f=dbl,
%jh='Car survey',
select banner $gender,
t#1=$main_car *,
filter $main_car/1,
t#2=$rating *,
filter $main_car/2,
t#3=$rating *,
filter $main_car/3,
t#4=$rating *,
filter $main_car/4,
t#5=$rating *,
filter $main_car/5,
t#6=$rating *,
filter $main_car/6,
t#7=$rating *,
filter $main_car/7,
t#8=$rating *,
filter $main_car/8,
t#9=$rating *,
filter $main_car/9,
t#10=$rating *,
filter $main_car/10,
t#11=$rating *,
filter $main_car/11,
t#12=$rating *,
filter off,
t#13=$makes_considered *,
t#14=$makes_considered *,
it='Based on answers given',
finish tables,
start manip,
mt#14(r0)=#14(r1)  + (r2)  + (r3)  + (r4)  + (r5)  + (r6)  + (r7)  + (r8)  + (r9)  + (r10)  + (r11)  + (r12) ,
mt#1(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#2(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#3(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#4(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#5(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#6(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#7(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#8(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#9(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#10(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#11(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#12(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#13(r0,c0-2)=%tex(0,0,'EMPTY'),
mt#14(r0,c0-2)=%tex(0,0,'EMPTY'),
finish manip,
